In diesem Beispiel wird die Weekday-Funktion verwendet, um den Wochentag aus einem angegebenen Datum zu ermitteln.
Dim Datum1, Wochentag1
Datum1 = #12. Februar 1969# ' Datum zuweisen.
Wochentag1 = Weekday(Datum1) ' Wochentag1 enthΣlt 4, da
' Datum1 einen Mittwoch darstellt.